八年级信息技术`急

来源:百度知道 编辑:UC知道 时间:2024/05/22 18:44:57
你们知道市内电话话费的计费方法吗?按电信局规定:室内电话通话首三分钟收费0.22元,三分钟后按每分钟0.11元收费.试在横线上填写合适的语句或表达试,使程序完成如下的功能:当输入通话时间后,计算并显示应付的话费.
Private Sub Form_Click()
w=InputBox("请输入通话时间(分钟)"'"输入"
If___________Then
f=___________
Else
f=___________
End If
Print"通话时间:";w;"分钟"
Print"应付电话费:"f;"元"
End Sub

输入框text1
确定键Command1
代码
Private Sub Command1_Click()
If Text1 > 3 Then
f = Text1 * 0.11
Else
f = Text1 * 0.33
End If
MsgBox "您的通话时间" & Text1.Text & "分钟", , ""
MsgBox "应付电话费: " & f & " 元", , ""
End Sub